package top.MiraiJavaEasy;

import net.mamoe.mirai.Bot;
import net.mamoe.mirai.event.ConcurrencyKind;
import net.mamoe.mirai.event.Event;
import net.mamoe.mirai.event.EventPriority;
import net.mamoe.mirai.event.Listener;
import org.jetbrains.annotations.NotNull;
import org.slf4j.Logger;
import org.slf4j.LoggerFactory;
import top.MiraiJavaEasy.Event.EasyEvent;
import top.MiraiJavaEasy.Event.MiraiJavaEasyEvent;
import top.MiraiJavaEasy.Exception.MiraiJavaEasyException;
import top.MiraiJavaEasy.Exception.MiraiJavaEasyRuntimeException;

import java.io.File;
import java.io.FileFilter;
import java.io.IOException;
import java.io.UnsupportedEncodingException;
import java.net.JarURLConnection;
import java.net.URL;
import java.net.URLDecoder;
import java.util.*;
import java.util.jar.JarEntry;
import java.util.jar.JarFile;

/**
 * 该类为事件创建类。
 * 开发者可以通过两种方式创建事件。
 * <p>
 * 1.toListener（@NotNull MiraiJavaEasyEvent<T> miraiJavaEasyEvent）函数
 * 该函数需要你输入一个miraiJavaEasyEvent对象，程序会基于这个对象创建指定的mirai事件，并返回
 * <p>
 * 2.Build()函数
 * 注意：该函数在执行之前，请确保EasyEventPackagePath变量不为空！
 * 该函数会创建并返回EasyEventPackagePath变量所指示的包下，所有有着EasyEvent注解且为MiraiJavaEasyEvent子类的mirai事件集合
 * 或者可以使用Build(false)，来无视EasyEvent注解，选择创建包下所有能创建的mirai事件集合
 * @param <T> T需要继承net.mamoe.mirai.event.Event
 */
public class ListenerBuild<T extends Event> {
    private final Logger logger =  LoggerFactory.getLogger(ListenerBuild.class);
    /**
     * 所要创建事件的Bot
     */
    private final Bot bot;
    /**
     * 需要扫描的事件的包路径
     */
    private String EasyEventPackagePath;

    public ListenerBuild(Bot bot) {
        this.bot = bot;
    }

    public ListenerBuild(Bot bot, String EasyEventPackagePath) {
        this.bot = bot;
        this.EasyEventPackagePath = EasyEventPackagePath;
    }

    /**
     * 创建所有在变量 EasyEventPackagePath 包下的事件，如果开启注解扫描，则只扫描被EasyEvent注解标记的类
     *
     * @param OpenAnnotation 是否开启注解扫描
     * @return 所创建的事件集合
     */
    public List<Listener<T>> Build(boolean OpenAnnotation) {
        try {
            if (EasyEventPackagePath != null) {
                List<Listener<T>> listenerList = new ArrayList<>();
                List<MiraiJavaEasyEvent<T>> miraiJavaEasyEventList = getAllEasyEvent(OpenAnnotation);
                logger.info("开始挂载" + miraiJavaEasyEventList.size() + "个事件！");
                for (MiraiJavaEasyEvent<T> m : miraiJavaEasyEventList) {
                    listenerList.add(toListener(m));
                }
                logger.info("成功挂载" + miraiJavaEasyEventList.size() + "个事件！");
                return listenerList;
            } else {
                throw new MiraiJavaEasyException("需要扫描的事件的包路径为空！");
            }
        } catch (MiraiJavaEasyException e) {
            logger.error("事件集合创建失败！", e);
            return null;
        }
    }

    /**
     * 创建所有在变量 EasyEventPackagePath 包下的事件，且只扫描被EasyEvent注解标记的类
     *
     * @return 所创建的事件集合
     */
    public List<Listener<T>> Build() {
        return Build(true);
    }

    /**
     * 根据MiraiJavaEasyEvent的子类，生成单个mirai事件监听器对象
     *
     * @param miraiJavaEasyEvent MiraiJavaEasyEvent的子类
     * @return 单个mirai事件监听器对象
     */
    public Listener<T> toListener(@NotNull MiraiJavaEasyEvent<T> miraiJavaEasyEvent) {
        if (bot == null) {
            throw new MiraiJavaEasyRuntimeException("bot对象为null！");
        } else {
            /*
          获取并发模式，如果返回null则使用ConcurrencyKind.CONCURRENT
         */
            ConcurrencyKind concurrency = miraiJavaEasyEvent.getConcurrencyKind() == null ? ConcurrencyKind.CONCURRENT : miraiJavaEasyEvent.getConcurrencyKind();
        /*
          获取事件优先级.
          在广播时, 事件监听器的调用顺序为 (从左到右): HIGHEST -> HIGH -> NORMAL -> LOW -> LOWEST -> MONITOR
          如果返回null则使用EventPriority.NORMAL
         */
            EventPriority priority = miraiJavaEasyEvent.getEventPriority() == null ? EventPriority.NORMAL : miraiJavaEasyEvent.getEventPriority();

            return bot.getEventChannel().subscribeAlways(miraiJavaEasyEvent.getEventClass(),
                    bot.getCoroutineContext(),
                    concurrency, priority
                    , event -> {
                        try {
                            miraiJavaEasyEvent.Start(event);
                        } catch (Exception e) {
                            miraiJavaEasyEvent.Catch(event, e);
                        } finally {
                            miraiJavaEasyEvent.Finally(event);
                        }
                    });
        }
    }

    /**
     * 获取所扫描的包下，所有含有EasyEvent注解的类对象集合
     *
     * @param OpenAnnotation 是否开启注解扫描
     * @return 类对象集合
     * @throws MiraiJavaEasyException 实例化出错时报错
     */
    private List<MiraiJavaEasyEvent<T>> getAllEasyEvent(boolean OpenAnnotation) throws MiraiJavaEasyException {
        Set<Class<?>> classes = getClasses(EasyEventPackagePath);
        List<MiraiJavaEasyEvent<T>> miraiJavaEasyEventList = new ArrayList<>();
        logger.info("包 " + EasyEventPackagePath + " 下成功扫描到" + classes.size() + "个类！");
        for (Class<?> cl : classes) {
            if (OpenAnnotation) {
                //如果注解扫描开启，则扫描EasyEvent注解
                if (cl.getAnnotation(EasyEvent.class) != null) {
                    try {
                        miraiJavaEasyEventList.add((MiraiJavaEasyEvent<T>) cl.getDeclaredConstructor().newInstance());
                    } catch (Exception e) {
                        logger.error("实例化MiraiJavaEasyEvent对象时出错！请检查EasyEvent注解是否标记了非事件类！", e);
                    }
                }
            } else {
                //反之则不扫描
                try {
                    miraiJavaEasyEventList.add((MiraiJavaEasyEvent<T>) cl.getDeclaredConstructor().newInstance());
                } catch (Exception e) {
                    logger.error("实例化MiraiJavaEasyEvent对象时出错！请检查包" + EasyEventPackagePath + "中是否混入了非事件类！", e);
                }
            }
        }
        logger.info("成功实例化" + miraiJavaEasyEventList.size() + "个类！");
        return miraiJavaEasyEventList;
    }

    /**
     * 根据包名获取包下面所有的类名
     *
     * @param pack 包路径
     * @return 类集合
     * @throws MiraiJavaEasyException 错误
     */
    private Set<Class<?>> getClasses(String pack) throws MiraiJavaEasyException {

        // 第一个class类的集合
        Set<Class<?>> classes = new LinkedHashSet<Class<?>>();
        // 是否循环迭代
        boolean recursive = true;
        // 获取包的名字 并进行替换
        String packageDirName = pack.replace('.', '/');
        // 定义一个枚举的集合 并进行循环来处理这个目录下的things
        Enumeration<URL> dirs;
        try {
            dirs = Thread.currentThread().getContextClassLoader().getResources(packageDirName);
        } catch (IOException e) {
            throw new MiraiJavaEasyException("Enumeration<URL> dirs初始化失败！", e);
        }
        // 循环迭代下去
        while (dirs.hasMoreElements()) {
            // 获取下一个元素
            URL url = dirs.nextElement();
            // 得到协议的名称
            String protocol = url.getProtocol();
            // 如果是以文件的形式保存在服务器上
            if ("file".equals(protocol)) {
                // 获取包的物理路径
                String filePath = null;
                try {
                    filePath = URLDecoder.decode(url.getFile(), "UTF-8");
                } catch (UnsupportedEncodingException e) {
                    throw new MiraiJavaEasyException("获取包的物理路径出错！", e);
                }
                // 以文件的方式扫描整个包下的文件 并添加到集合中
                findClassesInPackageByFile(pack, filePath, recursive, classes);
            } else if ("jar".equals(protocol)) {
                // 如果是jar包文件
                // 定义一个JarFile
                System.out.println("jar类型的扫描");
                JarFile jar;
                try {
                    // 获取jar
                    jar = ((JarURLConnection) url.openConnection()).getJarFile();
                    // 从此jar包 得到一个枚举类
                    Enumeration<JarEntry> entries = jar.entries();
                    findClassesInPackageByJar(pack, entries, packageDirName, recursive, classes);
                } catch (IOException e) {
                    throw new MiraiJavaEasyException("在扫描用户定义视图时从jar包获取文件出错！", e);
                }
            }
        }
        return classes;
    }

    /**
     * 以文件的形式来获取包下的所有Class
     */
    private void findClassesInPackageByFile(String packageName,
                                            String packagePath,
                                            final boolean recursive,
                                            Set<Class<?>> classes) throws MiraiJavaEasyException {
        // 获取此包的目录 建立一个File
        File dir = new File(packagePath);
        // 如果不存在或者 也不是目录就直接返回
        if (!dir.exists() || !dir.isDirectory()) {
            // log.warn("用户定义包名 " + packageName + " 下没有任何文件");
            return;
        }
        // 如果存在 就获取包下的所有文件 包括目录
        File[] dirfiles = dir.listFiles(new FileFilter() {
            // 自定义过滤规则 如果可以循环(包含子目录) 或则是以.class结尾的文件(编译好的java类文件)
            @Override
            public boolean accept(File file) {
                return (recursive && file.isDirectory()) || (file.getName().endsWith(".class"));
            }
        });
        // 循环所有文件
        for (File file : dirfiles) {
            // 如果是目录 则继续扫描
            if (file.isDirectory()) {
                findClassesInPackageByFile(packageName + "." + file.getName(), file.getAbsolutePath(), recursive, classes);
            } else {
                // 如果是java类文件 去掉后面的.class 只留下类名
                String className = file.getName().substring(0, file.getName().length() - 6);
                try {
                    // 添加到集合中去
                    // classes.add(Class.forName(packageName + '.' +
                    // className));
                    // 经过回复同学的提醒，这里用forName有一些不好，会触发static方法，没有使用classLoader的load干净
                    classes.add(Thread.currentThread().getContextClassLoader().loadClass(packageName + '.' + className));
                } catch (ClassNotFoundException e) {
                    throw new MiraiJavaEasyException("添加用户自定义视图类错误 找不到此类的.class文件！", e);
                }
            }
        }
    }

    /**
     * 以jar的形式来获取包下的所有Class
     */
    private void findClassesInPackageByJar(String packageName,
                                           Enumeration<JarEntry> entries,
                                           String packageDirName,
                                           final boolean recursive,
                                           Set<Class<?>> classes) throws MiraiJavaEasyException {
        // 同样的进行循环迭代
        while (entries.hasMoreElements()) {
            // 获取jar里的一个实体 可以是目录 和一些jar包里的其他文件 如META-INF等文件
            JarEntry entry = entries.nextElement();
            String name = entry.getName();
            // 如果是以/开头的
            if (name.charAt(0) == '/') {
                // 获取后面的字符串
                name = name.substring(1);
            }
            // 如果前半部分和定义的包名相同
            if (name.startsWith(packageDirName)) {
                int idx = name.lastIndexOf('/');
                // 如果以"/"结尾 是一个包
                if (idx != -1) {
                    // 获取包名 把"/"替换成"."
                    packageName = name.substring(0, idx).replace('/', '.');
                }
                // 如果可以迭代下去 并且是一个包
                if ((idx != -1) || recursive) {
                    // 如果是一个.class文件 而且不是目录
                    if (name.endsWith(".class") && !entry.isDirectory()) {
                        // 去掉后面的".class" 获取真正的类名
                        String className = name.substring(packageName.length() + 1, name.length() - 6);
                        try {
                            // 添加到classes
                            classes.add(Class.forName(packageName + '.' + className));
                        } catch (ClassNotFoundException e) {
                            throw new MiraiJavaEasyException("添加用户自定义视图类错误 找不到此类的.class文件！", e);
                        }
                    }
                }
            }
        }
    }

    public String getEasyEventPackagePath() {
        return EasyEventPackagePath;
    }

    public void setEasyEventPackagePath(String EasyEventPackagePath) {
        this.EasyEventPackagePath = EasyEventPackagePath;
    }
}
